home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1989 January / Ahoy_Magazine_89-01_1989_Double_L.d64 / Screen Line Rev. (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1989-01-01  |  515 b   |  18 lines
  1. 100 sa=828:ck=0
  2. 110 fora=0to76:readd
  3. 120 pokesa+a,d:ck=ck+d:next
  4. 130 ifck<>11089thenprint"*** data error ***":end
  5. 140 print"[147]screen line reverser":print
  6. 150 print"sys"sa"[157],row,col,number of characters"
  7. 160 end
  8. 170 data32,155,183,224,25,176,67,134
  9. 180 data174,32,155,183,224,40,176,58
  10. 190 data134,175,166,174,181,217,41,127
  11. 200 data133,194,189,240,236,133,193,24
  12. 210 data165,175,101,193,133,193,144,2
  13. 220 data230,194,169,41,229,175,133,175
  14. 230 data24,32,155,183,228,175,144,2
  15. 240 data166,175,134,174,160,0,177,193
  16. 250 data73,128,145,193,200,196,174,144
  17. 260 data245,96,76,72,178
  18.